home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-04 / shazam11.zip / DEMOC2.EVT < prev    next >
Text File  |  1991-11-04  |  394b  |  15 lines
  1.    {===================================================================
  2.  
  3.    ABOUT:  created with DLGDSN
  4.  
  5.    ===================================================================}
  6. procedure heAbout ;
  7. {$I about.src }
  8. var
  9.    Dialog                    : PDialog ;
  10. begin
  11.    Dialog                    := MakeDialog ;
  12.    DeskTop^.ExecView ( Dialog ) ;
  13.    Dispose ( Dialog , Done ) ;
  14. end ;
  15.